home *** CD-ROM | disk | FTP | other *** search
- /* Copyright (C) 1999 Aladdin Enterprises. All rights reserved.
-
- This file is part of AFPL Ghostscript.
-
- AFPL Ghostscript is distributed with NO WARRANTY OF ANY KIND. No author or
- distributor accepts any responsibility for the consequences of using it, or
- for whether it serves any particular purpose or works at all, unless he or
- she says so in writing. Refer to the Aladdin Free Public License (the
- "License") for full details.
-
- Every copy of AFPL Ghostscript must include a copy of the License, normally
- in a plain ASCII text file named PUBLIC. The License grants you the right
- to copy, modify and redistribute AFPL Ghostscript, but only under certain
- conditions described in the License. Among other things, the License
- requires that the copyright notice and this notice be preserved on all
- copies.
- */
-
- /*$Id: gdevdcrd.c,v 1.2 2000/09/19 19:00:12 lpd Exp $ */
- /* Create a sample device CRD */
- #include "math_.h"
- #include "memory_.h"
- #include "string_.h"
- #include "gx.h"
- #include "gserrors.h"
- #include "gsparam.h"
- #include "gscspace.h" /* for gscie.h */
- #include "gscrd.h"
- #include "gscrdp.h"
- #include "gxdevcli.h"
- #include "gdevdcrd.h"
-
- /*
- * The parameters in this driver CRD are the default PostScript values,
- * except for the optional 'dented' procedures.
- */
- #define DENT(v, f)\
- (v <= 0.5 ? v * f : (v - 0.5) * (1 - (0.5 * f)) / 0.5 + 0.5 * f)
- private const gs_vector3 bit_WhitePoint = {0.9505, 1, 1.0890};
- private const gs_range3 bit_RangePQR = {
- {{0, 0.9505}, {0, 1}, {0, 1.0890}}
- };
- private const float dent_PQR = 1.0;
- private int
- bit_TransformPQR_proc(int index, floatp in, const gs_cie_wbsd * pwbsd,
- gs_cie_render * pcrd, float *out)
- {
- *out = DENT(in, dent_PQR);
- return 0;
- }
- private const gs_cie_transform_proc3 bit_TransformPQR = {
- bit_TransformPQR_proc, "bitTPQRDefault", {0, 0}, 0
- };
- private const float dent_LMN = 1.0;
- private float
- bit_EncodeLMN_proc(floatp in, const gs_cie_render * pcrd)
- {
- return DENT(in, dent_LMN);
- }
- private const gs_cie_render_proc3 bit_EncodeLMN = { /* dummy */
- {bit_EncodeLMN_proc, bit_EncodeLMN_proc, bit_EncodeLMN_proc}
- };
- private const gs_range3 bit_RangeLMN = {
- {{0, 0.9505}, {0, 1}, {0, 1.0890}}
- };
- private const gs_matrix3 bit_MatrixABC = {
- { 3.24063, -0.96893, 0.05571},
- {-1.53721, 1.87576, -0.20402},
- {-0.49863, 0.04152, 1.05700}
- };
- private float
- bit_EncodeABC_proc(floatp in, const gs_cie_render * pcrd)
- {
- return pow(max(in, 0.0), 0.45);
- }
- private const gs_cie_render_proc3 bit_EncodeABC = {
- {bit_EncodeABC_proc, bit_EncodeABC_proc, bit_EncodeABC_proc}
- };
- /* These RenderTables are no-ops. */
- private const byte bit_rtt0[2*2*3] = {
- /*0,0,0*/ 0,0,0,
- /*0,0,1*/ 0,0,255,
- /*0,1,0*/ 0,255,0,
- /*0,1,1*/ 0,255,255
- };
- private const byte bit_rtt1[2*2*3] = {
- /*1,0,0*/ 255,0,0,
- /*1,0,1*/ 255,0,255,
- /*1,1,0*/ 255,255,0,
- /*1,1,1*/ 255,255,255
- };
- private const gs_const_string bit_rt_data[2] = {
- {bit_rtt0, 2*2*3}, {bit_rtt1, 2*2*3}
- };
- private frac
- bit_rt_proc(byte in, const gs_cie_render *pcrd)
- {
- return frac_1 * in / 255;
- }
- private const gs_cie_render_table_t bit_RenderTable = { /* dummy */
- {3, {2, 2, 2}, 3, bit_rt_data},
- {{bit_rt_proc, bit_rt_proc, bit_rt_proc}}
- };
-
- /*
- * Implement get_params for a sample device CRD. A useful convention,
- * for devices that can provide more than one CRD, is to have a settable
- * parameter CRDName, which gives the name of the CRD in use. This sample
- * code provides a constant CRDName: making it settable is left as an
- * exercise to the reader.
- */
- int
- sample_device_crd_get_params(gx_device *pdev, gs_param_list *plist,
- const char *crd_param_name)
- {
- int ecode = 0;
-
- if (param_requested(plist, "CRDName") > 0) {
- gs_param_string cns;
- int code;
-
- cns.data = (const byte *)crd_param_name;
- cns.size = strlen(crd_param_name);
- cns.persistent = true;
- code = param_write_string(plist, "CRDName", &cns);
- if (code < 0)
- ecode = code;
- }
- if (param_requested(plist, crd_param_name) > 0) {
- gs_cie_render *pcrd;
- int code = gs_cie_render1_build(&pcrd, pdev->memory,
- "sample_device_crd_get_params");
- if (code >= 0) {
- gs_cie_transform_proc3 tpqr;
-
- tpqr = bit_TransformPQR;
- tpqr.driver_name = pdev->dname;
- code = gs_cie_render1_initialize(pcrd, NULL,
- &bit_WhitePoint, NULL /*BlackPoint*/,
- NULL /*MatrixPQR*/, &bit_RangePQR, &tpqr,
- NULL /*MatrixLMN*/, &bit_EncodeLMN, &bit_RangeLMN,
- &bit_MatrixABC, &bit_EncodeABC, NULL /*RangeABC*/,
- &bit_RenderTable);
- if (code >= 0) {
- code = param_write_cie_render1(plist, crd_param_name, pcrd,
- pdev->memory);
- }
- rc_decrement(pcrd, "sample_device_crd_get_params"); /* release */
- }
- if (code < 0)
- ecode = code;
- }
- if (param_requested(plist, bit_TransformPQR.proc_name) > 0) {
- /*
- * We definitely do not recommend the following use of a static
- * to hold the address: this is a shortcut.
- */
- gs_cie_transform_proc my_proc = bit_TransformPQR_proc;
- byte *my_addr = gs_alloc_string(pdev->memory, sizeof(my_proc),
- "sd_crd_get_params(proc)");
- int code;
-
- if (my_addr == 0)
- code = gs_note_error(gs_error_VMerror);
- else {
- gs_param_string as;
-
- memcpy(my_addr, &my_proc, sizeof(my_proc));
- as.data = my_addr;
- as.size = sizeof(my_proc);
- as.persistent = true;
- code = param_write_string(plist, bit_TransformPQR.proc_name, &as);
- }
- if (code < 0)
- ecode = code;
- }
- return ecode;
- }
-